home *** CD-ROM | disk | FTP | other *** search
/ Mac Magazin/MacEasy 32 / Mac Magazin and MacEasy Magazine CD - Issue 32.iso / Grafik & Text / OzTeX3.0 / TeX-inputs / LaTeX / graphics / tcidvi.def < prev    next >
Text File  |  1997-03-07  |  5KB  |  165 lines
  1. %%
  2. %% This is file `tcidvi.def',
  3. %% generated with the docstrip utility.
  4. %%
  5. %% The original source files were:
  6. %%
  7. %% drivers.dtx  (with options: `tcidvi,color4,nops')
  8. %% 
  9. %% drivers.dtx Copyright (C) 1994      David Carlisle Sebastian Rahtz
  10. %%             Copyright (C) 1995 1996 David Carlisle
  11. %%
  12. %% This file is part of the Standard LaTeX `Graphics Bundle'.
  13. %%
  14. %% It should be distributed *unchanged* and together with all other
  15. %% files in the graphics bundle. The file 00readme.txt contains a list
  16. %% of all of these files.
  17. %%
  18. %% A modified version of this file may be distributed, but it should
  19. %% be distributed with a *different* name. Changed files must be
  20. %% distributed *together with a complete and unchanged* distribution
  21. %% of these files.
  22. %%
  23. \ProvidesFile{tcidvi.def}
  24.         [1996/12/12 v3.0d Driver-dependant file (DPC,SPQR)]
  25. \def\c@lor@arg#1{%
  26.   \dimen@#1\p@
  27.   \ifdim\dimen@<\z@\dimen@\maxdimen\fi
  28.   \ifdim\dimen@>\p@
  29.     \PackageError{color}{Argument `#1' not in range [0,1]}\@ehd
  30.   \fi}
  31. \def\color@gray#1#2{%
  32.   \c@lor@arg{#2}%
  33.   \c@lor@rgb@RGB\@tempa
  34.   \edef#1{\@tempa\@tempa\@tempa}%
  35.   }
  36. \def\color@cmyk#1#2{\c@lor@@cmyk#2\@@#1}
  37. \def\c@lor@@cmyk#1,#2,#3,#4\@@#5{%
  38.   \c@lor@arg{#4}%
  39.     \dimen@ii#4\p@
  40.   \c@lor@arg{#1}%
  41.   \c@lor@cmyk@RGB\@tempa
  42.   \c@lor@arg{#2}%
  43.   \c@lor@cmyk@RGB\@tempb
  44.   \c@lor@arg{#3}%
  45.   \c@lor@cmyk@RGB\@tempc
  46.   \edef#5{\@tempa\@tempb\@tempc}%
  47.   }
  48. \def\c@lor@cmyk@RGB#1{%
  49.   \advance\dimen@-\p@
  50.   \advance\dimen@\dimen@ii
  51.   \dimen@-\@cclv\dimen@
  52.   \divide\dimen@\p@
  53.   \count@\ifdim\dimen@<\z@\z@\else\dimen@\fi
  54.   \edef#1{\the\count@\space}}
  55. \def\color@rgb#1#2{\c@lor@@rgb#2\@@#1}
  56. \def\c@lor@@rgb#1,#2,#3\@@#4{%
  57.   \c@lor@arg{#1}%
  58.   \c@lor@rgb@RGB\@tempa
  59.   \c@lor@arg{#2}%
  60.   \c@lor@rgb@RGB\@tempb
  61.   \c@lor@arg{#3}%
  62.   \c@lor@rgb@RGB\@tempc
  63.   \edef#4{\@tempa\@tempb\@tempc}%
  64.   }
  65. \def\c@lor@rgb@RGB#1{%
  66.   \dimen@\@cclv\dimen@
  67.   \count@\dimen@
  68.   \divide\count@\p@
  69.   \edef#1{\the\count@\space}}
  70. \def\color@RGB#1#2{\c@lor@@RGB#2\@@#1}
  71. \def\c@lor@@RGB#1,#2,#3\@@#4{%
  72.   \edef#4{#1 #2 #3}%
  73.   }
  74. \def\color@named#1#2{\c@lor@@named#2,,\@@#1}
  75. \def\c@lor@@named#1,#2,#3\@@#4{%
  76.   \@ifundefined{col@#1}%
  77.     {\PackageError{color}{Undefined color `#1'}\@ehd}%
  78.   {\edef#4{\csname col@#1\endcsname}}%
  79.   }
  80. \def\c@lor@to@ps#1#2 #3 #4\@@{%
  81.   #1#2 255 div #3 255 div #4 255 div setrgbcolor}
  82. \def\current@color{0 0 0}
  83. \def\set@color{%
  84.   \special{textcolor: \current@color}\aftergroup\reset@color}
  85. \def\reset@color{\special{textcolor: \current@color}}
  86. \def\set@page@color{%
  87.   \c@lor@special\sixt@@n{background color ignored: \current@color}}
  88. \def\define@color@named#1#2{%
  89.   \expandafter\edef\csname col@#1\endcsname{#2}}
  90. \AtBeginDocument{\def\color@block#1#2#3{%
  91.   {\rlap{\ifcolors@
  92.       \@defaultunits\count@\current@color\@nnil
  93.       \dimen@\count@\p@
  94.       \divide\dimen@\@cclv
  95.       \dimen@ii#2%
  96.       \advance\dimen@ii#3%
  97.       \lower#3\hbox{%
  98.       \special{language "Scientific Word";%
  99.                type "greybox";%
  100.                greyscale \strip@pt\dimen@;%
  101.                height \the\dimen@ii;%
  102.                width \the#1;%
  103.                depth 0pt;}}%
  104.            \fi}}}}
  105. \def\Ginclude@eps#1{%
  106.  \message{<#1>}%
  107.  \raise\Gin@req@height\hbox{%
  108.   \ifx\Gin@ollx\@undefined
  109.   \else
  110.     \@tempdimb \Gin@ourx bp%
  111.     \advance\@tempdimb-\Gin@ollx bp%
  112.     \@tempdima\Gin@llx bp%
  113.     \advance\@tempdima-\Gin@ollx bp%
  114.     \Gscale@div\TCI@cropleft\@tempdima\@tempdimb
  115.     \@tempdima\Gin@urx bp%
  116.     \advance\@tempdima-\Gin@ollx bp%
  117.     \Gscale@div\TCI@cropright\@tempdima\@tempdimb
  118.     \@tempdimb \Gin@oury bp%
  119.     \advance\@tempdimb-\Gin@olly bp%
  120.     \@tempdima\Gin@lly bp%
  121.     \advance\@tempdima-\Gin@olly bp%
  122.     \Gscale@div\TCI@cropbottom\@tempdima\@tempdimb
  123.     \@tempdima\Gin@ury bp%
  124.     \advance\@tempdima-\Gin@olly bp%
  125.     \Gscale@div\TCI@croptop\@tempdima\@tempdimb
  126.   \fi
  127.     \special{%
  128.       language \TCI@language;%
  129.       type \TCI@type;%
  130.       valid_file \TCI@validfile;%
  131.       width \the\Gin@req@width;%
  132.       height \the\Gin@req@height;%
  133.       depth 0pt;%
  134.       original-width \the\Gin@nat@width;%
  135.       original-height \the\Gin@nat@height;%
  136.       cropleft "\TCI@cropleft";%
  137.       croptop "\TCI@croptop";%
  138.       cropright "\TCI@cropright";%
  139.       cropbottom "\TCI@cropbottom";%
  140.       filename '#1';%
  141.       \ifx\TCI@temp\@empty\else tempfilename \TCI@temp;\fi
  142.       }}}
  143. \def\TCI@language{"Scientific Word"}
  144. \def\TCI@type{"GRAPHIC"}
  145. \def\TCI@validfile{'F'}
  146. \def\TCI@cropleft{0}
  147. \def\TCI@croptop{1}
  148. \def\TCI@cropright{1}
  149. \def\TCI@cropbottom{0}
  150. \let\TCI@temp\@empty
  151. \let\Ginclude@bmp\Ginclude@eps
  152. \def\Gin@extensions{}
  153. \@namedef{Gin@rule@.ps}#1{{eps}{.ps}{#1}}
  154. \@namedef{Gin@rule@.eps}#1{{eps}{.eps}{#1}}
  155. \@namedef{Gin@rule@.PS}#1{{eps}{.PS}{#1}}
  156. \@namedef{Gin@rule@.EPS}#1{{eps}{.EPS}{#1}}
  157. \@namedef{Gin@rule@*}#1{{bmp}{\Gin@ext}{#1}}
  158. \def\Gin@PS@raw#1{}
  159. \def\Gin@PS@restored#1{}
  160. \def\Gin@PS@literal@header#1{}
  161. \def\Gin@PS@file@header#1{}
  162. \endinput
  163. %%
  164. %% End of file `tcidvi.def'.
  165.